home *** CD-ROM | disk | FTP | other *** search
/ The Complete Work of Mahatma Gandhi / The Complete Work of Mahatma Gandhi-CD interactive.iso / pc / ganmac / eb.cst / 00160_Script_volume 150 < prev    next >
Text File  |  1999-05-31  |  675b  |  25 lines
  1. on mouseDown
  2.   --  for 150
  3.   global gvolume,cspname
  4.   set wgrp to chars(cspname,1,1)
  5.   if (gvolume < 150) or (gvolume > 150) then
  6.     if gvolume = 0 then
  7.       set the member of sprite 106 to the number of member (wgrp&"vol0")
  8.     else
  9.       set the member of sprite 108 to the number of member (wgrp&"voll")
  10.     end if
  11.     
  12.     set the member of sprite 107 to the number of member ("r"&wgrp&"volm")
  13.     set the soundlevel to 3
  14.     set the volume of sound 2 to 150
  15.     set the volume of sound 1 to 150
  16.     updateStage
  17.     if gvolume = 0 then
  18.       set the soundEnabled to true
  19.       updateStage
  20.     end if
  21.     
  22.     set gvolume to 150
  23.     
  24.   end if
  25. end